home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 001a / commou5b.zip / COMMO.MAC < prev    next >
Text File  |  1991-09-03  |  46KB  |  896 lines
  1.  IMPORTANT--> This is COMMO.MAC of COMMOU5B.  It contains autologon and
  2.               protocol macros for COMMO50.  Updated 9-4-91.
  3.               Courtesy of:  Richard Grant ArtWorld BBS! (619)462-6887
  4.  ╔════════════════════════════════════════════════════════════════════════════╗ upproto
  5.  ║                                                                            ║
  6.  ║                          ┌──────────────────────┐                          ║
  7.  ║                          │ Upload Protocol Menu │                          ║
  8.  ║                          └──────────────────────┘                          ║
  9.  ║                   ZMODEM BATCH                 External                    ║ {goto zm1s}
  10.  ║                   YMODEM BATCH                 External                    ║ {goto ym1s}
  11.  ║                   XMODEM 1K                    Internal                    ║ {goto xk1s}
  12.  ║                   XMODEM CRC                   External                    ║ {goto xc1s}
  13.  ║                   XMODEM CSUM                  Internal                    ║ {goto xs1s}
  14.  ║                   MPt BATCH                    External                    ║ {goto mp1s}
  15.  ║                   PUMA BATCH                   External                    ║ {goto pm1s}
  16.  ║                   MEGALINK     (Does Not Work) External                    ║ {goto ml1s}
  17.  ║                   KERMIT                       External                    ║ {goto km1s}
  18.  ║                   SEALINK                      External                    ║ {goto sl1s}
  19.  ║                   HYPERP                       External                    ║ {goto hp1s}
  20.  ║                   JMODEM                       External                    ║ {goto jm1s}
  21.  ║                   BIMODEM                      External                    ║ {goto bim1}
  22.  ║                   ZMAX                         External                    ║ {goto zx1s}
  23.  ║                   TMODEM                       External                    ║ {goto tm1s}
  24.  ║                                                                  Macros -> ║ {:pgu} {macro upproto}
  25.  ╚════════════════════════════════════════════════════════════════════════════╝
  26.  ╔════════════════════════════════════════════════════════════════════════════╗ dnproto
  27.  ║                                                                            ║
  28.  ║                         ┌────────────────────────┐                         ║
  29.  ║                         │ Download Protocol Menu │                         ║
  30.  ║                         └────────────────────────┘                         ║
  31.  ║                   ZMODEM BATCH     (Automatic) External                    ║ {goto zm1r}
  32.  ║                   YMODEM BATCH                 External                    ║ {goto ym1r}
  33.  ║                   XMODEM 1K                    Internal                    ║ {goto xk1r}
  34.  ║                   XMODEM CRC                   External                    ║ {goto xc1r}
  35.  ║                   XMODEM CSUM                  Internal                    ║ {goto xs1r}
  36.  ║                   MPt BATCH        (Automatic) External                    ║ {goto mp1r}
  37.  ║                   PUMA BATCH       (Automatic) External                    ║ {goto pm1r}
  38.  ║                   MEGALINK                     External                    ║ {goto ml1r}
  39.  ║                   KERMIT   (Goes to COMMO Dir) External                    ║ {goto km1r}
  40.  ║                   SEALINK  (Goes to COMMO Dir) External                    ║ {goto sl1r}
  41.  ║                   HYPERP                       External                    ║ {goto hp1r}
  42.  ║                   JMODEM                       External                    ║ {goto jm1r}
  43.  ║                   BIMODEM                      External                    ║ {goto bim1}
  44.  ║                   ZMAX     (Goes to COMMO Dir) External                    ║ {goto zx1r}
  45.  ║                   TMODEM                       External                    ║ {goto tm1r}
  46.  ║                                                                  Macros -> ║ {:pgd} {macro dnproto}
  47.  ╚════════════════════════════════════════════════════════════════════════════╝
  48.  ╔════════════════════════════════════════════════════════════════════════════╗ utilmenu
  49.  ║                                                                            ║
  50.  ║                            ┌────────────────────┐                          ║
  51.  ║                            │ Macro Utility Menu │                          ║
  52.  ║                            └────────────────────┘                          ║
  53.  ║                                                                            ║
  54.  ║                                                                            ║
  55.  ║                                                                            ║
  56.  ║                            Edit an External File                           ║ {goto uext} {:alu} {macro utilmenu}
  57.  ║                                                                            ║
  58.  ║                            Run a Macro                                     ║ {goto urun}
  59.  ║                                                                            ║
  60.  ║                            Run MOSTHOST (Host Mode, install first)         ║ {goto uhost}
  61.  ║                                                                            ║
  62.  ║                            View/Edit MOSTHOST                              ║ {goto vhost}
  63.  ║                                                                            ║
  64.  ║                                                                            ║
  65.  ║                                                                            ║
  66.  ║                                                                            ║
  67.  ║                                                                            ║
  68.  ║                                                                  Macros -> ║
  69.  ╚════════════════════════════════════════════════════════════════════════════╝
  70.  
  71.   Macros for Utility Menu
  72.   ────────────────────────────────────────────────────────────────────────────
  73.   {:urun}  {input runmac,Macro to run} {goto %runmac} {}
  74.   {:uext}  {input temp,Filename to edit}
  75.   {:uedit} {edit %temp} {macro} {}
  76.   {:uhost} {macl mosthost.mac,bbs}
  77.   {:vhost} {setv temp,%_hom%mosthost.mac} {goto uedit}
  78.  
  79.                              ┌────────────┐
  80.  PgDn for more macros        │ Macro File │          PgDn for more macros
  81.                              └────────────┘
  82.   1)  A program indicated to the right of a macro must be in your DOS path.
  83.   2)  Move Selector Bar to desired entry, press [Enter].
  84.  
  85.  Download Macros                                            Program Required
  86.  ZMODEM BATCH   {:zmodem} {:zm1r} {exec-aw DSZ port %_por speed %_spe rz -mr %dldir} {} (DSZ0807)
  87.  YMODEM BATCH   {:ym1r} {exec-aw DSZ port %_por speed %_spe rb -k %dldir} {} (DSZ0807)
  88.  YMODEM G BATCH {:0000} {exec-aw DSZ port %_por speed %_spe rb -g %dldir} {}            DSZ.COM
  89.  XMODEM 1K      {:0000} {call gfnd} {exec-aw DSZ port %_por speed %_spe rc -k %file} {} (DSZ0807)
  90.  XMODEM 1K-INT  {:xk1r} {call gfnd} {rxmo-k %file} {}
  91.  XMODEM CRC     {:xc1r} {call gfnd} {exec-aw DSZ port %_por speed %_spe rc %file} {} (DSZ0807)
  92.  XMODEM CSUM    {:0000} {call gfnd} {exec-aw DSZ port %_por speed %_spe rx %file} {} (DSZ0807)
  93.  XMODEM CSUM-INT{:xs1r} {call gfnd} {rxmo-c0 %file} {}
  94.  MPT BATCH      {:mpt}  {:mp1r} {exec-aw MPT P%_por S%_spe r %dldir\} {} (MPT110)
  95.  PUMA BATCH     {:puma} {:pm1r} {exec-aw PUMA P%_por S%_spe r %dldir\} {} (PUMA100)
  96.  MEGALINK       {:ml1r} {exec-aw MLINK16 PORT %_por SPEED %_spe RM %dldir} {} (MLINK16)
  97.  KERMIT         {:km1r} {exec-aw PCKERMIT -L COM%_por -B %_spe -R} {} (PCKERM21)
  98.  SEALINK        {:sl1r} {exec-aw CLINK12 R /P%_por /B%_spe} {} (CLINK34)
  99.  HYPERP         {:hp1r} {call gfnd} {exec-aw HYPERP Port:%_por Baud:%_spe Display:OFF Checktype:CRC Overwrite:On receive %file} {} (HYPERP)
  100.  JMODEM         {:jm1r} {call gfnd} {exec-aw JMODEM R%_por %file} {} (JMOD305B)
  101.  BIMODEM BATCH  {:bim1} {exec-a BIMOD} {} (BIMOD124)
  102.  ZMAX           {:zx1r} {exec-aw ZMAX -B %_spe -P %_por -R} {} (ZMAX100B)
  103.  TMODEM         {:tm1r} {exec-aw TMODEM -K -U%dldir -B%_spe -P%_por -R} {} (TMOD610)
  104.  ZMODEM BATCH   {:0000} {call gfnd} {exec-aw PCZ %_por %_spe rz %file} {} (PCZ30390)
  105.  YMODEM BATCH   {:0000} {call gfnd} {exec-aw PCZ %_por %_spe ry %file} {} (PCZ30390)
  106.  XMODEM-1K      {:0000} {call gfnd} {exec-aw PCZ %_por %_spe r1 %file} {} (PCZ30390)
  107.  XMODEM         {:0000} {call gfnd} {exec-aw PCZ %_por %_spe rx %file} {} (PCZ30390)
  108.  SEALINK        {:0000} {exec-aw PCZ %_por %_spe rs %dldir} {} (PCZ30390)
  109.  LYNX           {:0000} {call gfnd} {exec-aw LYNX R /%_spe /%_por %dldir\} {} (LYNX302)
  110.  SUPER8K BATCH  {:0000} {exec-aw SUPERK P%_por S%_spe RSB F %dldir} {} (SK&J1202)
  111.  K9XMODEM BATCH {:0000} {exec-aw SUPERK P%_por S%_spe RKB F %dldir} {} (SK&J1202)
  112.  WXMODEM        {:0000} {call gfnd} {exec-aw SUPERK P%_por S%_spe RW F %dldir\} {} (SK&J1202)
  113.  CMODEM         {:0000} {call gfnd} {exec-aw SUPERK P%_por S%_spe RH F %dldir\} {} (SK&J1202)
  114.  WXMODEM        {:0000} {call gfnd} {exec-aw WXFER port %_por speed %_spe -r %dldir\} {} (WXFER0417)
  115.  TRANSLINK      {:0000} {exec-aw TRLINK -B%_spe -P%_por R} {} (TRLNK180)
  116.  PUNTER         {:0000} {call gfnd} {exec PUNTER /R /M /P%_por /B%_spe %dldir\} {} (PNTR211)
  117.  CMODEM         {:0000} {exec RCMODEM /p=%_por/rx/b=%_spe/shh/s=c %dldir} {} (CMODEM26)
  118.  IMODEM         {:0000} {call gfnd} {exec-aw QMXFER -L COM%_por -B %_spe -P I -R -F %dldir\} {} (QMXFER)
  119.  CIS BPlus      {:0000} {exec OZBEXT /c%_por /f%dldir /n} {} (OZBEXT)
  120.  
  121.   {:gfnd} {setv file,%dldir\} {input file,Enter a filename to DOWNLOAD}
  122.           {ifex %file,,gf_y} {input %yn,File exists, overwrite? [Y/n]}
  123.           {comp yn} {ifco gf_y} {comp yn,y} {ifco gf_y} {return}
  124.           {:gf_y} {return}
  125.  
  126.  Upload Macros                                              Program Required
  127.  ZMODEM BATCH   {:zm1s} {call gfnu} {exec-aw DSZ port %_por speed %_spe sz -mr %file} {} (DSZ0807)
  128.  YMODEM BATCH   {:ym1s} {call gfnu} {exec-aw DSZ port %_por speed %_spe sb -k %file} {} (DSZ0807)
  129.  YMODEM G BATCH {:0000} {call gfnu} {exec-aw DSZ port %_por speed %_spe sb -g -k %file} {} (DSZ0807)
  130.  XMODEM 1K      {:0000} {call gfnu} {exec-aw DSZ port %_por speed %_spe sx -k %file} {} (DSZ0807)
  131.  XMODEM 1K-INT  {:xk1s} {call gfnu} {sxmo-k %file} {}
  132.  XMODEM CRC     {:xc1s} {call gfnu} {exec-aw DSZ port %_por speed %_spe sx %file} {} (DSZ0807)
  133.  XMODEM CSUM    {:0000} {call gfnu} {exec-aw DSZ port %_por speed %_spe sx %file} {} (DSZ0807)
  134.  XMODEM CSUM-INT{:xs1s} {call gfnu} {sxmo %file} {}
  135.  MPT BATCH      {:mp1s} {call gfnu} {exec-aw MPT P%_por S%_spe s %file} {} (MPT110)
  136.  PUMA BATCH     {:pm1s} {call gfnu} {exec-aw PUMA P%_por S%_spe s %file} {} (PUMA100)
  137.  MEGALINK       {:ml1s} {call gfnu} {exec-aw MLINK16 PORT %_por SPEED %_spe SM %file} {} (MLINK16)
  138.  KERMIT         {:km1s} {call gfnu} {exec-aw PCKERMIT -L COM%_por -B %_spe -S %file} {} (PCKERM21)
  139.  SEALINK        {:sl1s} {call gfnu} {exec-aw CLINK12 T /P%_por /B%_spe %file} {} (CLINK34)
  140.  HYPERP         {:hp1s} {call gfnu} {exec-aw HYPERP Port:%_por Baud:%_spe Display:OFF Checktype:CRC Overwrite:On send %file} {} (HYPERP)
  141.  JMODEM         {:jm1s} {call gfnu} {exec-aw JMODEM S%_por %file} {} (JMOD305B)
  142.  BIMODEM BATCH  {:0000} {exec-a BIMOD} {} (BIMOD124)
  143.  ZMAX           {:zx1s} {call gfnu} {exec-aw ZMAX -B %_spe -P %_por -F %file} {} (ZMAX100B)
  144.  TMODEM         {:tm1s} {call gfnu} {exec-aw TMODEM -B%_spe -P%_por -F %file} {} (TMOD610)
  145.  ZMODEM BATCH   {:0000} {call gfnu} {exec-aw PCZ %_por %_spe sz %file} {} (PCZ30390)
  146.  YMODEM BATCH   {:0000} {call gfnu} {exec-aw PCZ %_por %_spe sy %file} {} (PCZ30390)
  147.  XMODEM-1K      {:0000} {call gfnu} {exec-aw PCZ %_por %_spe s1 %file} {} (PCZ30390)
  148.  XMODEM         {:0000} {call gfnu} {exec-aw PCZ %_por %_spe sx %file} {} (PCZ30390)
  149.  SEALINK        {:0000} {call gfnu} {exec-aw PCZ %_por %_spe ss %file} {} (PCZ30390)
  150.  LYNX           {:0000} {call gfnu} {exec-aw LYNX S /%_spe /%_por %file} {} (LYNX302)
  151.  SUPER8K BATCH  {:0000} {exec-aw SUPERK P%_por S%_spe SSB F %file} {} (SK&J1202)
  152.  K9XMODEM BATCH {:0000} {exec-aw SUPERK P%_por S%_spe SKB F %file} {} (SK&J1202)
  153.  WXMODEM        {:0000} {call gfnu} {exec-aw SUPERK P%_por S%_spe SW F %file} {} (SK&J1202)
  154.  CMODEM         {:0000} {call gfnu} {exec-aw SUPERK P%_por S%_spe SH F %file} {} (SK&J1202)
  155.  WXMODEM        {:0000} {call gfnu} {exec-aw WXFER port %_por speed %_spe -s %file} {} (WXFER0417)
  156.  TRANSLINK      {:0000} {call gfnu} {exec-aw TRLINK -B%_spe -P%_por S} {} (TRLNK180)
  157.  PUNTER         {:0000} {call gfnu} {exec-aw PUNTER /S /M /Z255 /P%_por /B%_spe %file} {} (PNTR211)
  158.  CMODEM         {:0000} {call gfnu} {exec RCMODEM /p=%_por/tx/b=%_spe/shh/s=c %file} {} (CMODEM26)
  159.  IMODEM         {:0000} {call gfnu} {exec-aw QMXFER -L COM%_por -B %_spe -P I -S -F %file} {} (QMXFER)
  160.  CIS BPlus      {:0000} {exec OZBEXT /c%_por /f%uldir /n} {} (OZBEXT)
  161.  
  162.   {:gfnu} {setv file,%uldir\} {input file,Enter filename to UPLOAD} {return}
  163.  
  164.  Pick-N-Shoot Upload Macros                                     (Need PNS21)
  165.   ZMODEM BATCH {:CF2} {call PNS} {exec-aw DSZ port %_por speed %_spe sz @C:\COMMO\FILE.LST} {} (DSZ0807)
  166.   YMODEM BATCH {:CF4} {call PNS} {exec-aw DSZ port %_por speed %_spe sb -k @C:\COMMO\FILE.LST} {} (DSZ0807)
  167.   XMODEM-1K    {:CF6} {call PNS} {exec-aw DSZ port %_por speed %_spe sx -k @C:\COMMO\FILE.LST} {} (DSZ0807)
  168.   XMODEM CRC   {:CF8} {call PNS} {exec-aw DSZ port %_por speed %_spe sx @C:\COMMO\FILE.LST} {} (DSZ0807)
  169.   MPT BATCH    {:CF0} {call PNS} {exec-aw MPT P%_por S%_spe s @C:\COMMO\FILE.LST} {} (MPT110)
  170.   PUMA BATCH   {:000} (call PNS} {exec PUMA P%_por S%_spe s @C:\COMMO\FILE.lST} {} (PUMA100)
  171.   {:PNS} {exec COMMOPNS C:\COMMO\FILE.LST -D%uldir -S%_spe} {return}
  172.   The program COMMOPNS.EXE and DSZ.COM(or DSZ.EXE) must be in your DOS PATH.
  173.   IF you change 'C:\FILE.LST' in the {PNS} macro, you must change it to the
  174.   exact same thing each of the {exec DSZ...} macros.  The '@' and drive
  175.   specifier MUST be included, OR DSZ won't work.  The -F causes direct video
  176.   writes to the screen instead of BIOS calls. The -D option tells COMMOPNS in
  177.   which directory to start.  The -S options tells COMMPNS the bps rate.
  178.  
  179.  Byte Brother's Power Node                                   (Need BBPOWERI)
  180.  {:alj} {exec-aw POWERN} {}
  181.  
  182.  Comlog                                                        (Need COMLOG)
  183.  {:all} {exec-w COMLOG} {}
  184.  
  185.  Quote Editor and ASCii Uploader                      (Need TRUNC12 and PE2)
  186.  ***************************************************************************
  187.  Five Easy Steps to Quote A Message:
  188.  1) Hit <F9> to capture the screen you wish to edit.
  189.  2) Make sure the BBS is in position to receive your typing.
  190.  3) Hit <F10> to edit the captured quote using PE2's functions.
  191.  4) Hit <F3> and <ENTER> to exit PE2 and to upload the finished quote.
  192.  5) You may now type out your reply to complete the rest of your message.
  193.  ***************************************************************************
  194.  The macros below assign screen save, editing, and truncating functions to
  195.  function keys 9 and 10.
  196.  {:nf9} {screen y,trunc.scn} {}
  197.  {:nf0} {exec pe2 trunc.scn}
  198.        {exec trunc.exe trunc.scn trunc.out}
  199.        {asciiup trunc.out,:}
  200.        {send  |}
  201.        {exec del trunc.scn} {}
  202.  NOTE: The TRUNC executable must be followed by the COMMO screen image, then
  203.        one space, and then the output file.  TRUNC is VERY unforgiving about
  204.        deviating from the above.  The pacing character ":" is assumed below.
  205.  
  206.  Handy Function Key Macros
  207.  {:nf2}  {send JONATHAN DEER|} {} (First and Last Name)
  208.  {:nf3}  {send %_pas|} {}
  209.  {:nf4}  {send 000-000-0000|} {} (Voice Phone Number)
  210.  {:nf5}  {send 000-000-0000|} {} (Data Phone Number)
  211.  {:nf6}  {send 00-00-00|} {} (Birthdate)
  212.  {:nf7}  {send CITY, STATE|} {} (City, State)
  213.  {:nf8}  {}
  214.  
  215.  {:sf1}  {}
  216.  {:sf2}  {}
  217.  {:sf3}  {}
  218.  {:sf4}  {}
  219.  {:sf5}  {}
  220.  {:sf6}  {exec list commo.log /e} {}                             (LIST76A)
  221.  {:sf7}  {exec list commo.scn /e} {}                             (LIST76A)
  222.  {:sf8}  {exec list commo.fon} {}                                (LIST76A)
  223.  {:sf9}  {exec-w hdir %dldir} {}                                 (HDIR201)
  224.  {:sf0}  {exec list %_cap /e} {}                                 (LIST76A)
  225.  
  226.  Autologon Macros for Popular BBSs                     Bulletin Board System
  227.  {:wcb}  {exec del c:\commo\commo.cap} {clear}                WildCat BBS
  228.          {setl 60,hng,6,|}
  229.   {:wc0}  {golo wca,esc} {golo wcc,[N]onstop} {golo wcd,Last Name}
  230.           {golo wce,correctly?} {golo wcf,Enter First} (Pacific On-Line Bypass)
  231.           {look First Name} {send JONATHAN|} (First Name)
  232.   {:wc1}  {golo wcg,Last Name} {golo wch,correctly?}
  233.           {golo wci,Are you JONATHAN DEER} (First and Last Name)
  234.           {look Password} {send %_pas|}
  235.   {:wc2}  {golo wcj,birth date} {golo wck,phone number}
  236.           {golo wcl,Special Bulletin} {golo wcm,correctly?} {golo wcn,[N]onstop}
  237.           {golo wco,quit:} {golo wcp,view it [Y/n]?} {golo wcq,menu [y/n]?}
  238.           {golo wcr,bulletin menu} {golo wcs,[ENTER]}
  239.           {golo wct,continue anyway [y/n]?} {golo wcu,main menu}
  240.           {golo wcv,Command >>}
  241.           {look zzzzzzz}
  242.   {:wc3}  {}
  243.    {:wca}  {send ^[^[} {goto wc0}
  244.    {:wcc}  {send s|} {goto wc0}
  245.    {:wcd}  {send |} {goto wc0}
  246.    {:wce}  {pause 1} {send n|} {goto wc0}
  247.    {:wcf}  {goto wc0}
  248.    {:wcg}  {send DEER|} {goto wc1} (Last Name)
  249.    {:wch}  {pause 1} {send n|} {goto wc0}
  250.    {:wci}  {send Y|} {goto wc1}
  251.    {:wcj}  {send 000000|} {send Y|} {goto wc2} (Birthdate)
  252.    {:wck}  {send 0000000000|} {send Y|} {goto wc2} (Phone Number)
  253.    {:wcl}  {send |} {goto wc2}
  254.    {:wcm}  {send n|} {goto wc2}
  255.    {:wcn}  {send s|} {goto wc2}
  256.    {:wco}  {send |} {goto wc2}
  257.    {:wcp}  {send n|} {goto wc2}
  258.    {:wcq}  {send n|} {goto wc2}
  259.    {:wcr}  {send n|} {goto wc2}
  260.    {:wcs}  {send |} {goto wc2}
  261.    {:wct}  {send y|} {goto wc2} (Impending Event Prompt)
  262.    {:wcu}  {goto wc3}
  263.    {:wcv}  {goto wc3}
  264.  
  265.  {:pcb}  {exec del c:\commo\commo.cap} {clear}                PCBoard BBS
  266.          {setl 60,hng,6,|}
  267.   {:pc0}  {golo pca,(Enter)=no?} {golo pcc,(enter=no)?}
  268.           {golo pcd,graphics [C/R]=no?} {golo pce,esc}
  269.           {look name?} {send JONATHAN DEER|} (First and Last Name)
  270.   {:pc1}  {golo pcf,correct?}
  271.           {look password} {send ~%_pas|}
  272.   {:pc2}  {golo pcg,More?} {golo pch,continue?} {golo pci,=yes?}
  273.           {golo pcj,=yes)?} {golo pck,(H)elp, (Enter)=More?}
  274.           {golo pcl,(Enter)='S'?} {golo pcm,Main Board - Your Command}
  275.           {golo pcn,main board command} {golo pco,Main Board (0) Command?}
  276.           {golo pcp,Main Board - Your Main Menu Command}
  277.           {golo pcq,Conference Command} {golo pcr,Main Board] Command}
  278.           {look zzzzzzz}
  279.   {:pc3}  {}
  280.    {:pca}  {send |} {goto pc0} (Graphics Prompt)
  281.    {:pcc}  {send |} {goto pc0} (Graphics Prompt)
  282.    {:pcd}  {send |} {goto pc0} (Graphics Prompt)
  283.    {:pce}  {send ^[^[} {goto pc0}
  284.    {:pcf}  {send Y|} {goto pc1}
  285.    {:pcg}  {send n|} {goto pc2}
  286.    {:pch}  {send |} {goto pc2}
  287.    {:pci}  {send n|} {goto pc2}
  288.    {:pcj}  {send n|} {goto pc2}
  289.    {:pck}  {send n|} {goto pc2}
  290.    {:pcl}  {send |} {goto pc2}
  291.    {:pcm}  {goto pc3}
  292.    {:pcn}  {goto pc3}
  293.    {:pco}  {goto pc3}
  294.    {:pcp}  {goto pc3}
  295.    {:pcq}  {goto pc3}
  296.    {:pcr}  {goto pc3}
  297.  
  298.  {:prl}  {exec del c:\commo\commo.cap} {clear}                ProLogon
  299.          {setl 60,hng,6,|}
  300.   {:pr0}  {golo pra,(Enter)=no?} {golo prc,esc}
  301.           {look name?} {send JONATHAN DEER|~%_pas|} (First and Last Name)
  302.   {:pr1}  {golo prd,(NS)non-stop} {golo pre,continue}
  303.           {look main board} {}
  304.    {:pra}  {send |} {goto pr0}
  305.    {:prc}  {send ^[^[} {goto pr0}
  306.    {:prd}  {send N|} {goto pr1}
  307.    {:pre}  {send |} {goto pr1}
  308.  
  309.  {:phx}  {exec del c:\commo\commo.cap} {clear}                Phoenix RCS
  310.          {setl 60,hng,6,|}
  311.   {:ph0}  {golo pha,esc} {golo phb,continue} {golo phc,Graphics [y/N]}
  312.           {golo phd,<N>onStop} {golo phe,First Name?}
  313.           {golo phf,correct [Y/n]} {golo phg,try again}
  314.           {look Password:} {send %_pas|}
  315.   {:ph1}  {golo phh,continue} {golo phi,anyway [Y/n]} {golo phj,<N>onstop}
  316.           {look Main Menu} {}
  317.    {:pha}  {send ^[^[} {goto ph0}
  318.    {:phb}  {send |} {goto ph0}
  319.    {:phc}  {send |} {goto ph0} (Graphics Prompt)
  320.    {:phd}  {send |} {goto ph0}
  321.    {:phe}  {send JONATHAN DEER|} {goto ph0} (First and Last Name)
  322.    {:phf}  {send |} {goto ph0}
  323.    {:phg}  {goto ph0}
  324.    {:phh}  {send |} {goto ph1}
  325.    {:phi}  {send |} {goto ph1}
  326.    {:phj}  {send |} {goto ph1}
  327.  
  328.  {:ww4}  {exec del c:\commo\commo.cap} {clear}                WWIV BBS
  329.          {setl 60,hng,6,|}
  330.   {:ww0}  {golo wwa,Graphics?} {golo wwb,displayed (Y/N)?} {golo wwc,pause}
  331.           {golo wwd,Your choice} {golo wwe,Name:} {golo wwf,your name}
  332.           {golo wwg,NN:}
  333.           {look zzzzzzz}
  334.   {:ww1}  {golo wwh,-*-} {golo wwi,pause} {golo wwj,number,q,?}
  335.           {golo wwk,[Q] to continue:} {golo wwl,Yes or No ?}
  336.           {golo wwm,auto-message?} {golo wwn,new posts?} {golo wwo,mail now?}
  337.           {golo wwp,Which Bulletin} {golo wwq,[SMACK ANY KEY]}
  338.           {golo wwr,Change password?} {golo wws,last called?}
  339.           {golo wwt,Q=Quit >} {golo wwu,[1]} {golo wwv,<1>}
  340.           {look zzzzzzz}
  341.   {:ww2}  {}
  342.    {:wwa}  {send N} {goto ww0} (Graphics Prompt)
  343.    {:wwb}  {send N} {goto ww0} (Graphics Prompt)
  344.    {:wwc}  {send |} {goto ww0}
  345.    {:wwd}  {send 1} {pause 1} {send JONATHAN DEER|~%_pas|~0000|} {goto ww1} (First and Last Name;Last Four of Phone Number)
  346.    {:wwe}  {send JONATHAN DEER|~%_pas|~0000|} {goto ww1} (First and Last Name;Last Four of Phone Number)
  347.    {:wwf}  {send JONATHAN DEER|~%_pas|~0000|} {goto ww1} (First and Last Name;Last Four of Phone Number)
  348.    {:wwg}  {send JONATHAN DEER|~%_pas|~0000|} {goto ww1} (First and Last Name;Last Four of Phone Number)
  349.    {:wwh}  {send |} {goto ww1}
  350.    {:wwi}  {send |} {goto ww1}
  351.    {:wwj}  {send q} {goto ww1}
  352.    {:wwk}  {send q} {goto ww1}
  353.    {:wwl}  {send n} {goto ww1}
  354.    {:wwm}  {send n} {goto ww1}
  355.    {:wwn}  {send n} {goto ww1}
  356.    {:wwo}  {send n} {goto ww1}
  357.    {:wwp}  {send q} {goto ww1}
  358.    {:wwq}  {send |} {goto ww1}
  359.    {:wwr}  {send n} {goto ww1}
  360.    {:wws}  {send n} {goto ww1}
  361.    {:wwt}  {send q} {goto ww1}
  362.    {:wwu}  {goto ww2}
  363.    {:wwv}  {goto ww2}
  364.  
  365.  {:slb}  {exec del c:\commo\commo.cap} {clear}                Searchlight BBS
  366.          {setl 60,hng,6,|}
  367.   {:sl0}  {golo sla,esc} {golo slc,Disconnect / Hang Up}
  368.           {golo sld,[M]onochrome} {golo sle,(Y/N)?} {golo slf,-- more --}
  369.           {look type new} {send JONATHAN DEER|~%_pas|} (First and Last Name)
  370.   {:sl1}  {golo slg,(Enter to Quit)} {golo slh,[RETURN]:} {golo sli,Chatting}
  371.           {golo slj,summary} {golo slk,< more >} {golo sll,ENTER ]}
  372.           {golo slm,-- more --} {golo sln,Space for more} {golo slo,Kill  Quit}
  373.           {golo slp,Command:} {golo slq,User:}
  374.           {look zzzzzzz}
  375.   {:sl2}  {}
  376.    {:sla}  {send ^[^[} {goto sl0}
  377.    {:slc}  {send 1} {goto sl0}
  378.    {:sld}  {send M} {goto sl0} (Graphics Prompt)
  379.    {:sle}  {send Y} {goto sl0}
  380.    {:slf}  {send |} {goto sl0}
  381.    {:slg}  {send |||} {goto sl1}
  382.    {:slh}  {send |} {goto sl1}
  383.    {:sli}  {send n|} {goto sl1}
  384.    {:slj}  {send ^C} {goto sl1}
  385.    {:slk}  {send |} {goto sl1}
  386.    {:sll}  {send |} {goto sl1}
  387.    {:slm}  {send |} {goto sl1}
  388.    {:sln}  {send |} {goto sl1}
  389.    {:slo}  {send q} {goto sl1}
  390.    {:slp}  {goto sl2}
  391.    {:slq}  {goto sl2}
  392.  
  393.  {:qbb}  {exec del c:\commo\commo.cap} {clear}                Quick BBS
  394.          {setl 60,hng,6,|}
  395.   {:qb0}  {golo qba,esc} {golo qbc,name?}
  396.           {look Password:} {send %_pas|}
  397.   {:qb1}  {golo qbd,to continue} {golo qbe,Stop)} {golo qbf,[Y]/N/C}
  398.           {golo qbg,<N>o} {golo qbh,Press [ENTER]} {golo qbi,Press <ENTER>}
  399.           {golo qbj,Messages Now [Y/n]} {golo qbk,Main Menu}
  400.           {golo qbl,Wish} {golo qbm,Your Command} {golo qbn,Main Command}
  401.           {golo qbo,Press the key NOW} {golo qbp,Unit Awaits Order}
  402.           {look zzzzzzz}
  403.   {:qb2}  {}
  404.    {:qba}  {send ^[^[} {goto qb0}
  405.    {:qbc}  {send JONATHAN DEER|} {goto qb0} (First and Last Name)
  406.    {:qbd}  {send |} {goto qb1}
  407.    {:qbe}  {send S} {goto qb1}
  408.    {:qbf}  {send N} {goto qb1}
  409.    {:qbg}  {send N} {goto qb1}
  410.    {:qbh}  {send |} {goto qb1}
  411.    {:qbi}  {send |} {goto qb1}
  412.    {:qbj}  {send n} {goto qb1}
  413.    {:qbk}  {goto qb2}
  414.    {:qbl}  {goto qb2}
  415.    {:qbm}  {goto qb2}
  416.    {:qbn}  {goto qb2}
  417.    {:qbo}  {goto qb2}
  418.    {:qbp}  {goto qb2}
  419.  
  420.  {:qbz}  {exec del c:\commo\commo.cap} {clear}                Quick BBS
  421.          {look esc} {send ^[^[}                           (Procrastinor BBS)
  422.          {setl 60,hng,1,|}
  423.          {look name?} {send JONATHAN DEER|} (First and Last Name)
  424.          {look Password:} {send %_pas|}
  425.          {look More: [Y]/N/C} {send N|}
  426.          {look More: [Y]/N/C} {send N|}
  427.          {look Press (ENTER) to Continue} {send |} {}
  428.  
  429.  {:rma}  {exec del c:\commo\commo.cap} {clear}                Remote Access
  430.          {setl 60,hng,6,|}
  431.   {:rm0}  {golo rmb,esc} {golo rmc,name} {golo rmd,It's...}
  432.           {golo rme,please...} {golo rmf,sign in...}
  433.           {look password:} {send ~%_pas|}
  434.   {:rm1}  {golo rmg,try again} {golo rmh,to continue} {golo rmi,Y/n}
  435.           {golo rmj,<RETURN>]} {golo rmk,Press Enter} {golo rml,Press [Return]}
  436.           {golo rmm,[=]nonstop} {golo rmn,Letter of your choice} (Off The Edge...World Bypass)
  437.           {golo rmo,Section of the Main} (SW\SE Connection Bypass)
  438.           {golo rmp,Main Menu} {golo rmq,Main Command} {golo rmr,Select:}
  439.           {golo rms,remaining=>} {golo rmt,Min left :}
  440.           {golo rmu,Enter your selection}
  441.           {look zzzzzzz}
  442.   {:rm2}  {}
  443.    {:rmb}  {send ^[^[} {goto rm0}
  444.    {:rmc}  {pause 1} {send JONATHAN DEER|} {goto rm0} (First and Last Name)
  445.    {:rmd}  {pause 1} {send JONATHAN DEER|} {goto rm0} (First and Last Name)
  446.    {:rme}  {pause 1} {send JONATHAN DEER|} {goto rm0} (First and Last Name)
  447.    {:rmf}  {pause 1} {send JONATHAN DEER|} {goto rm0} (First and Last Name)
  448.    {:rmg}  {goto rm0}
  449.    {:rmh}  {send |} {goto rm1}
  450.    {:rmi}  {send n} {goto rm1}
  451.    {:rmj}  {send |} {goto rm1}
  452.    {:rmk}  {send |} {goto rm1}
  453.    {:rml}  {send |} {goto rm1}
  454.    {:rmm}  {send n} {goto rm1}
  455.    {:rmn}  {send R} {goto rm1}
  456.    {:rmo}  {goto rm1}
  457.    {:rmp}  {goto rm2}
  458.    {:rmq}  {goto rm2}
  459.    {:rmr}  {goto rm2}
  460.    {:rms}  {goto rm2}
  461.    {:rmt}  {goto rm2}
  462.    {:rmu}  {goto rm2}
  463.  
  464.  {:ops}  {exec del c:\commo\commo.cap} {clear}                Opus BBS
  465.          {setl 60,hng,6,|}
  466.   {:op1}  {golo opa,esc} {golo opb,name:} {golo opc,thy name here:}
  467.           {look zzzzzzz}
  468.   {:op2}  {golo opd,continue} {golo ope,[y/n]} {golo opf,More [Y,n,=]?}
  469.           {golo opg,MAIN:} {golo oph,Main Menu:}
  470.           {look zzzzzzz}
  471.   {:op3}  {}
  472.    {:opa}  {send ^[^[} {goto op1}
  473.    {:opb}  {send JONATHAN DEER|~|~%_pas|} {goto op2} (First and Last Name)
  474.    {:opc}  {send JONATHAN DEER|~|~%_pas|} {goto op2} (First and Last Name)
  475.    {:opd}  {send |} {goto op2}
  476.    {:ope}  {send n|} {goto op2}
  477.    {:opf}  {send n|} {goto op2}
  478.    {:opg}  {goto op3}
  479.    {:oph}  {goto op3}
  480.  
  481.  {:rbb}  {exec del c:\commo\commo.cap} {clear}                RBBS
  482.          {setl 60,hng,6,|}
  483.   {:rb0}  {golo rba,esc} {golo rbc,continue} {golo rbd,[Y],N,C,A}
  484.           {golo rbe,name?}
  485.           {look echo)?} {send %_pas|}
  486.   {:rb1}  {golo rbf,Continue} {golo rbg,[Y],N,C,A} {golo rbh,none)?}
  487.           {golo rbi,'Last Read' (Enter)=yes?} {golo rbj,([Y],N)}
  488.           {golo rbk,J)ump?} {golo rbl,MAIN command}
  489.           {golo rbm,Main Board Command} {golo rbn,Your command}
  490.           {look zzzzzzz}
  491.   {:rb2}  {}
  492.    {:rba}  {send ^[^[} {goto rb0}
  493.    {:rbc}  {send |} {goto rb0}
  494.    {:rbd}  {send N} {goto rb0}
  495.    {:rbe}  {send JONATHAN DEER|} {goto rb0} (First and Last Name)
  496.    {:rbf}  {send |} {goto rb1}
  497.    {:rbg}  {send N} {goto rb1}
  498.    {:rbh}  {send |} {goto rb1}
  499.    {:rbi}  {send n|} {goto rb1}
  500.    {:rbj}  {send n|} {goto rb1}
  501.    {:rbk}  {send a|} {goto rb1}
  502.    {:rbl}  {goto rb2}
  503.    {:rbm}  {goto rb2}
  504.    {:rbn}  {goto rb2}
  505.  
  506.  {:bbs}  {exec del c:\commo\commo.cap} {clear}                BBS-PC
  507.          {setl 60,hng,6,|}
  508.   {:bb0}  {golo bba,Press [Return]} {golo bbb,name:} {golo bbc,State:}
  509.           {golo bbd,(Y/N)?} {golo bbe,(Y)/N/NS?}
  510.           {golo bbf,Main Menu (? for Help):} (No Password for Micromiga)
  511.           {look password} {send %_pas|}
  512.   {:bb1}  {golo bbg,continue...} {golo bbh,(Y)/N/NS?} {golo bbi,[C]ontinue}
  513.           {golo bbj,Main}
  514.           {look zzzzzzz}
  515.   {:bb2}  {}
  516.    {:bba}  {send |} {goto bb0}
  517.    {:bbb}  {send JONATHAN DEER|} {goto bb0} (First and Last Name)
  518.    {:bbc}  {send CITY, STATE|} {goto bb0} (City and State)
  519.    {:bbd}  {send Y|} {goto bb0}
  520.    {:bbe}  {send N|} {goto bb0}
  521.    {:bbf}  {goto bb2}
  522.    {:bbg}  {send |} {goto bb1}
  523.    {:bbh}  {send N|} {goto bb1}
  524.    {:bbi}  {send C|} {goto bb1}
  525.    {:bbj}  {goto bb2}
  526.  
  527.  {:tbb}  {exec del c:\commo\commo.cap} {clear}                TBBS
  528.          {setl 60,hng,6,|}
  529.   {:tb0}  {golo tba,Full Name?} {golo tbc,First Name?} {golo tbd,Last Name?}
  530.           {golo tbe,Is this correct?}
  531.           {look Password:} {send %_pas|}
  532.   {:tb1}  {golo tbf,-More-} {golo tbg,Press Any Key} {golo tbh,Bulletins <Y/N>?}
  533.           {look Command:} {}
  534.    {:tba}  {send JONATHAN DEER|} {goto tb0} (First and Last Name)
  535.    {:tbc}  {send JONATHAN|} {goto tb0} (First Name)
  536.    {:tbd}  {send DEER|} {goto tb0} (Last Name)
  537.    {:tbe}  {send Y} {goto tb0}
  538.    {:tbf}  {send |} {goto tb1}
  539.    {:tbg}  {send |} {goto tb1}
  540.    {:tbh}  {send N} {goto tb1}
  541.  
  542.  {:ebb}  {exec del c:\commo\commo.cap} {clear}                EBBS-PC
  543.          {golo eba,color / graphics}
  544.          {setl 60,hng,6,|}
  545.   {:eb0}  {golo ebc,new} {golo ebd,name:}
  546.           {look password} {send %_pas|}
  547.   {:eb1}  {golo ebe,<SPACE> to Abort} {golo ebf,Stat's (Y/n)?}
  548.           {golo ebg,Press Any Key} {golo ebh,*MORE*} {golo ebi,Main Menu}
  549.           {golo ebj,Enter Command}
  550.           {look zzzzzzz}
  551.   {:eb2}  {}
  552.    {:eba}  {send |} {goto eb0}
  553.    {:ebc}  {send JONATHAN DEER|} {goto eb0} (First and Last Name)
  554.    {:ebd}  {send JONATHAN DEER|} {goto eb0} (First and Last Name)
  555.    {:ebe}  {send ^H} {goto eb1}
  556.    {:ebf}  {send n} {goto eb1}
  557.    {:ebg}  {send |} {goto eb1}
  558.    {:ebh}  {send |} {goto eb1}
  559.    {:ebi}  {goto eb2}
  560.    {:ebj}  {goto eb2}
  561.  
  562.  {:spf}  {exec del c:\commo\commo.cap} {clear}                Spitfire BBS
  563.          {setl 60,hng,6,|}
  564.   {:sp0}  {golo spa,GRAPHICS?} {golo spb,name:}
  565.           {look password:} {send %_pas|}
  566.   {:sp2}  {golo spc,[MM-DD-YY]:} {golo spd,< ENTER > to continue}
  567.           {golo spe,message(s)} {golo spg,Statistics}
  568.           {golo sph,last check? [y/N]}
  569.           {look < ENTER > to Main Menu} {send |} {}
  570.    {:spa}  {send |} {goto sp0} (Graphics Prompt)
  571.    {:spb}  {send JONATHAN DEER|} {goto sp0} (First and Last Name)
  572.    {:spc}  {send 000000|} {goto sp2} (Birthdate)
  573.    {:spd}  {send s|} {goto sp2}
  574.    {:spe}  {send n} {goto sp2}
  575.    {:spg}  {send n} {goto sp2}
  576.    {:sph}  {send n} {goto sp2}
  577.  
  578.  {:sds}  {exec del c:\commo\commo.cap} {clear}                Second Sight
  579.          {setl 60,hng,6,|}
  580.   {:sd0}  {golo sda,first name?} {golo sdb,last name?}
  581.           {look password?} {send ~%_pas|}
  582.   {:sd1}  {golo sdc,continue...}
  583.           {look Command} {}
  584.    {:sda}  {send ~JONATHAN|} {goto sd0} (First Name)
  585.    {:sdb}  {send ~DEER|} {goto sd0} (Last Name)
  586.    {:sdc}  {send |} {goto sd1}
  587.  
  588.  {:tlg}  {exec del c:\commo\commo.cap} {clear}                Teleguard BBS
  589.          {setl 60,hng,6,|}
  590.   {:tl0}  {golo tla,esc} {golo tlb,color} {golo tlc,A N S I} {golo tld,Ansi?}
  591.           {golo tle,to continue} {golo tlf,hit a key}  {golo tlh,The Kludge :}
  592.           {golo tli,NEW :} {golo tlj,Name:} {golo tlk,Logon :}
  593.           {golo tll,pause}
  594.           {look password   :} {send %_pas|}
  595.   {:tl1}  {golo tlm,hit a key} {golo tln,phone #:} {golo tlo,to continue}
  596.           {golo tlp,mail now?} {golo tlq,pause}
  597.           {golo tlr,Main Menu} {golo tls,Take Your Pick}
  598.           {look zzzzzzz}
  599.   {:tl2}  {}
  600.    {:tla}  {send ^[^[} {goto tl0}
  601.    {:tlb}  {send n} {goto tl0} (Graphics Prompt)
  602.    {:tlc}  {send n} {goto tl0} (Graphics Prompt)
  603.    {:tld}  {send n} {goto tl0}
  604.    {:tle}  {send |} {goto tl0}
  605.    {:tlf}  {send |} {goto tl0}
  606.    {:tlh}  {send JONATHAN DEER|} {goto tl0} (First and Last Name)
  607.    {:tli}  {send JONATHAN DEER|} {goto tl0} (First and Last Name)
  608.    {:tlj}  {send JONATHAN DEER|} {goto tl0} (First and Last Name)
  609.    {:tlk}  {send JONATHAN DEER|} {goto tl0} (First and Last Name)
  610.    {:tll}  {send |} {goto tl0}
  611.    {:tlm}  {send |} {goto tl1}
  612.    {:tln}  {send ~0000|} {goto tl1} (Last Four of Phone Number)
  613.    {:tlo}  {send |} {goto tl1}
  614.    {:tlp}  {send n} {goto tl1}
  615.    {:tlq}  {goto tl1}
  616.    {:tlr}  {goto tl2}
  617.    {:tls}  {goto tl2}
  618.  
  619.  {:max}  {exec del c:\commo\commo.cap} {clear}                Maxihost
  620.          {setl 60,hng,6,|}
  621.   {:ma0}  {golo maa,color?} {golo mab,Name:} {golo mac,correct?}
  622.           {look Password:} {send %_pas|}
  623.   {:ma1}  {golo mad,to continue}
  624.           {look Command:} {}
  625.    {:maa}  {send n} {goto ma0} (Graphics Prompt)
  626.    {:mab}  {send JONATHAN DEER|} {goto ma0} (First and Last Name)
  627.    {:mac}  {send Y} {goto ma1}
  628.    {:mad}  {send |} {goto ma1}
  629.  
  630.  {:maj}  {exec del c:\commo\commo.cap} {clear}                Major BBS
  631.          {setl 60,hng,6,|}                                (Marine Advisor)
  632.   {:ma2}  {look "NEW"} {send Drachir|} (User ID)
  633.           {look password:} {send %_pas|}
  634.   {:ma3}  {golo mae,hit any key}
  635.           {look terminate session} {}
  636.    {:mae}  {send |} {goto ma3}
  637.  
  638.  {:ant}  {exec del c:\commo\commo.cap} {clear}                Auntie
  639.          {setl 60,hng,6,|}                                  (Palladin)
  640.   {:an0}  {golo ana,esc} {golo anb,FIRST Name} {golo anc,LAST Name}
  641.           {look Password (dots will echo)} {send %_pas|}
  642.   {:an1}  {golo and,to continue} {golo ane,to Cancel} {golo anf,<ENTER> to end}
  643.           {look Main Area Function} {}
  644.    {:ana}  {send ^[^[} {goto an0}
  645.    {:anb}  {send JONATHAN|} {goto an0} (First Name)
  646.    {:anc}  {send DEER|} {goto an0} (Last Name)
  647.    {:and}  {send |} {goto an1}
  648.    {:ane}  {send ^K} {goto an1}
  649.    {:anf}  {send |} {goto an1}
  650.  
  651.  {:jbb}  {exec del c:\commo\commo.cap} {clear}                JBBS
  652.          {setl 60,hng,6,|}                              (Trader's World)
  653.   {:jb0}  {golo jba,esc} {golo jbc,lock-on.} {golo jbd,name:}
  654.           {golo jbe,[Y,n]?}
  655.           {look password?} {send %_pas|}
  656.   {:jb1}  {golo jbf,<ENTER> to continue} {golo jbg,<ENTER> to Quit to Main Menu}
  657.           {look JBBS Main Menu} {}
  658.    {:jba}  {send ^[^[} {goto jb0}
  659.    {:jbc}  {send ^[^[} {goto jb0}
  660.    {:jbd}  {send JONATHAN DEER|} {goto jb0} (First and Last Name)
  661.    {:jbe}  {send |} {goto jb0}
  662.    {:jbf}  {send |} {goto jb1}
  663.    {:jbg}  {send |} {goto jb1}
  664.  
  665.  {:fid}  {exec del c:\commo\commo.cap} {clear}                Fido
  666.          {setl 60,hng,6,|}                             (IEEE [CITY])
  667.          {look FIRST name:}
  668.          {look LAST name:}
  669.          {look Password:}
  670.   {:fi0}  {golo fia,More[c,Y,n]} {golo fib,FIRST name:} {golo fic,LAST name:}
  671.           {golo fie,[Y,n]:}
  672.           {look Password:} {send %_pas|}
  673.   {:fi1}  {golo fif,More[c,Y,n]}
  674.           {look Main Section} {}
  675.    {:fia}  {send n|} {goto fi0}
  676.    {:fib}  {send JONATHAN|} {goto fi0} (First Name)
  677.    {:fic}  {send DEER|} {goto fi0} (Last Name)
  678.    {:fie}  {send |} {goto fi0}
  679.    {:fif}  {send n|} {goto fi1}
  680.  
  681.  {:per}  {exec del c:\commo\commo.cap} {clear}               Perspective Data
  682.          {setl 60,hng,6,|}                                        Systems
  683.   {:pe0}  {golo pea,name?}                                   (Cygnus X-1 BBS)
  684.           {look echo)?} {send %_pas|}
  685.   {:pe1}  {golo peb,[Return] to continue} {golo pec,[C]ontinue?}
  686.           {golo ped,[Return]?}
  687.           {look Main Command} {}
  688.    {:pea}  {send JONATHAN DEER|} {goto pe0} (First and Last Name)
  689.    {:peb}  {send |} {goto pe1}
  690.    {:pec}  {send n} {goto pe1}
  691.    {:ped}  {send n} {goto pe1}
  692.  
  693.  {:gtp}  {exec del c:\commo\commo.cap} {clear}                GT Powercom BBS
  694.          {setl 60,hng,6,n|}                    (Catholic Information Network)
  695.   {:gt0}  {golo gta,graphics?} {golo gtb,name:}
  696.           {look password:} {send %_pas|}
  697.   {:gt1}  {golo gtc,More?} {golo gtd,number:} {golo gte,continue}
  698.           {golo gtf,mail?}
  699.           {look command} {}
  700.    {:gta}  {send ~n|} {goto gt0} (Graphics Prompt)
  701.    {:gtb}  {send JONATHAN DEER|~Y|} {goto gt0} (First and Last Name)
  702.    {:gtc}  {send n|} {goto gt1}
  703.    {:gtd}  {send q|} {goto gt1}
  704.    {:gte}  {send |} {goto gt1}
  705.    {:gtf}  {send |} {goto gt1}
  706.  
  707.  {:waf}  {exec del c:\commo\commo.cap} {clear}                Waffle
  708.          {setl 60,hng,6,|}                          (Hale Telecommunications)
  709.   {:wa0}  {golo waa,NEW:}
  710.           {look Password:} {send %_pas|}
  711.   {:wa1}  {golo wab,[more]}
  712.           {look (?=help!) ->} {}
  713.    {:waa}  {send JONATHAN|} {goto wa0} (First Name)
  714.    {:wab}  {send |} {goto wa1}
  715.  
  716.  {:ocp}  {exec del c:\commo\commo.cap} {clear}                Oracomm-Plus
  717.          {setl 60,hng,6,|}                                   (Tech Pro BBS)
  718.   {:oc1}  {golo oca,user:} {golo ocb,graphics}
  719.           {look password:} {send %_pas|}
  720.   {:oc2}  {golo occ,Continue}
  721.           {look What next?} {}
  722.    {:oca}  {send ACCOUNT CODE|} {goto oc1} (Account Code for Name)
  723.    {:ocb}  {send |} {goto oc1}
  724.    {:occ}  {send |} {goto oc2}
  725.  
  726.  {:frm}  {exec del c:\commo\commo.cap} {clear}                FoReM ST
  727.          {setl 60,hng,6,|}                               (Computer Plus BBS)
  728.   {:fr0}  {golo fra,Hit Return} {golo frb,Vidtex} {golo frc,User}
  729.           {look Password} {send %_pas|}
  730.   {:fr1}  {golo frd,Select (Q=Exit)}
  731.           {look Plus} {}
  732.    {:fra}  {send |} {goto fr0}
  733.    {:frb}  {send 1|} {goto fr0}
  734.    {:frc}  {send USER NUMBER|} {goto fr0} (User Number)
  735.    {:frd}  {send q|} {goto fr1}
  736.  
  737.  {:par}  {exec del c:\commo\commo.cap} {clear}                Paragon BBS
  738.          {setl 60,hng,6,|}                                    (Mouse Trap)
  739.   {:pa0}  {golo paa,esc} {golo pab,account):}
  740.           {look Password:} {send %_pas|}
  741.   {:pa1}  {golo pac,Your choice:} {golo pad,Press return}
  742.           {golo pae,(Q to Quit):}
  743.           {look Main:} {}
  744.    {:paa}  {send ^[^[} {goto pa0}
  745.    {:pab}  {send JONATHAN DEER|} {goto pa0} (First and Last Name)
  746.    {:pac}  {send 1|} {goto pa1}
  747.    {:pad}  {send |} {goto pa1}
  748.    {:pae}  {send Q} {goto pa1}
  749.  
  750.  {:elt}  {exec del c:\commo\commo.cap} {clear}                Elite BBS
  751.          {setl 60,hng,6,|}                                (BNB Engineering)
  752.   {:el0}  {golo ela,graphics (y/n)} {golo elb,More..(y/n/s)} {golo elc,login:}
  753.           {look Password:} {send %_pas|}
  754.   {:el1}  {golo eld,Pause...} {golo ele,posts (y/n)} {golo elf,files (y/n)}
  755.           {golo elg,More..(y/n/s)}
  756.           {look [Main Menu]} {}
  757.    {:ela}  {send n} {goto el0} (Graphics Prompt)
  758.    {:elb}  {send n} {goto el0}
  759.    {:elc}  {send ACCOUNT NUMBER|} {goto el0} (Account Number)
  760.    {:eld}  {send |} {goto el1}
  761.    {:ele}  {send n} {goto el1}
  762.    {:elf}  {send n} {goto el1}
  763.    {:elg}  {send n} {goto el1}
  764.  
  765.  {:tbz}  {exec del c:\commo\commo.cap} {clear}                TBBS
  766.          {setl 60,hng,6,|}                                 (Rendevous)
  767.          {look First Name?}                              -Not Currently Used-
  768.          {look Last Name?}
  769.   {:tb2}  {golo tbi,First Name?} {golo tbj,Last Name?}
  770.           {look Password:} {send %_pas|}
  771.   {:tb3}  {golo tbk,-More-} {golo tbl,Press Any Key}
  772.           {look Command:} {}
  773.    {:tbi}  {send JONATHAN|} {goto tb2} (First Name)
  774.    {:tbj}  {send USER NUMBER|} {goto tb2} (User Number for Last Name)
  775.    {:tbk}  {send |} {goto tb3}
  776.    {:tbl}  {send |} {goto tb3}
  777.  
  778.  {:dmg}  {exec del c:\commo\commo.cap} {clear}                DMG-BBS
  779.          {setl 60,hng,6,|}                               -Not Currently Used-
  780.   {:dm0}  {golo dma,esc} {golo dmb,Name:}
  781.           {look Password:} {send %_pas|} {}
  782.    {:dma}  {send ^[^[} {goto dm0}
  783.    {:dmb}  {send JONATHAN DEER|} {goto dm0} (First and Last Name)
  784.  
  785.  {:rib}  {exec del c:\commo\commo.cap} {clear}                RIBBS
  786.          {setl 60,hng,60,|}                              -Not Currently Used-
  787.   {:ri0}  {golo ria,esc} {golo ric,Paused} {golo rid,name :}
  788.           {look password:} {send %_pas|}
  789.   {:ri1}  {golo rie,Press any key} {golo rif,Enter to Continue}
  790.           {golo rig,mail now (Y/n)}
  791.           {look Command ?} {}
  792.    {:ria}  {send ^[} {goto ri0}
  793.    {:ric}  {send |} {goto ri0}
  794.    {:rid}  {send JONATHAN DEER|} {goto ri0} (First and Last Name)
  795.    {:rie}  {send |} {goto ri1}
  796.    {:rif}  {send |} {goto ri1}
  797.    {:rig}  {send n} {goto ri1}
  798.  
  799.  {:pro}  {exec del c:\commo\commo.cap} {clear}                Pro BBS
  800.          {setl 60,hng,6,|}                               -Not Currently Used-
  801.   {:pr2}  {golo prf,select} {golo prg,new user}
  802.           {look Password} {send %_pas|} {}
  803.    {:prf}  {send 1|} {goto pr2}
  804.    {:prg}  {send JONATHAN DEER|} {goto pr2} (First and Last Name)
  805.  
  806.  {:prb}  {exec del c:\commo\commo.cap} {clear}                Proboard
  807.          {setl 60,hng,6,|}                               -Not Currently Used-
  808.   {:pr3}  {golo prh,esc} {golo pri,User Number} {golo prj,last name}
  809.           {look Password} {send %_pas|}
  810.   {:pr4}  {golo prk,[ENTER] to continue} {golo prm,[Enter = Quit]}
  811.           {golo prn,more ?}
  812.           {look Main} {}
  813.    {:prh} {send ^[^[} {goto pr3}
  814.    {:pri} {send JONATHAN|} {goto pr3} (First Name)
  815.    {:prj} {send DEER|} {goto pr3} (Last Name)
  816.    {:prk} {send |} {goto pr4}
  817.    {:prm} {send |} {goto pr4}
  818.    {:prn} {send n} {goto pr4}
  819.  
  820.  {:mbb}  {exec del c:\commo\commo.cap} {clear}                Micro BBS
  821.          {setl 60,hng,6,n|}                              -Not Currently Used-
  822.   {:mb0}  {golo mba,FIRST name?} {golo mbc,LAST name?}
  823.           {look password?} {send %_pas|} {}
  824.    {:mba}  {send JONATHAN|} {goto mb0} (First Name)
  825.    {:mbc}  {send DEER|} {goto mb0} (Last Name)
  826.  
  827.  {:tan}  {exec del c:\commo\commo.cap} {clear}                Tandy
  828.          {setl 60,hng,6,|}                               -Not Currently Used-
  829.          {look Name :} {send ~JONATHAN DEER|} (First and Last Name)
  830.   {:ta0}  {golo taa,[Y/N]}
  831.           {look Password :} {send %_pas|} {}
  832.    {:taa}  {send Y} {goto ta0}
  833.  
  834.  {:img}  {exec del c:\commo\commo.cap} {clear}                Image
  835.          {setl 60,hng,6,|}                               -Not Currently Used-
  836.   {:im0}  {golo ima,IBM Graphics?}
  837.           {golo imb,ID Number.}
  838.           {look Password} {send ~%_pas|} {}
  839.    {:ima}  {send Y} {goto im0} (Graphics Prompt)
  840.    {:imb}  {send ~0000|} {goto im0} (Last Four of Phone Number)
  841.  
  842.  {:dlg}  {exec del c:\commo\commo.cap} {clear}            Dialog Professional
  843.          {setl 60,hng,6,|}                               -Not Currently Used-
  844.   {:dl0}  {golo dla,Name =>}
  845.           {look Password =>} {send %_pas|} {}
  846.    {:dla}  {send JONATHAN DEER|} {goto dl0} (First and Last Name)
  847.  
  848.  {:lam}  {exec del c:\commo\commo.cap} {clear}                Lamda
  849.          {setl 60,hng,6,Y|}                              -Not Currently Used-
  850.   {:la0}  {golo laa,Username:}
  851.           {look Password:} {send %_pas|} {}
  852.    {:laa}  {send JONATHAN DEER|} {goto la0} (First and Last Name)
  853.  
  854.  {:pbb}  {exec del c:\commo\commo.cap} {clear}                PBBS
  855.          {setl 60,hng,6,|}                               -Not Currently Used-
  856.   {:pb0}  {golo pba,<<--}
  857.           {look Password:} {send %_pas|} {}
  858.    {:pba} {send JONATHAN DEER|} {goto pb0} (First and Last Name)
  859.  
  860.   {:cis} {setlook 45,hng,2,^c}                                CompuServe
  861.          {send ^c} {capt y,c:\commo\cis.cap} {asci ,:}  -Not Currently Used-
  862.          {lookfor User ID:} {send 71021,356|}
  863.          {setl 20,hng} {lookfor Password:} {send %_pas|} {}
  864.  
  865.                     ──────────────────────────────
  866.                     Full Screen Editor Key Support
  867.                     ──────────────────────────────
  868.   The following keys are used by full screen editors such as Visual Editor in
  869.   ProDoor, PCBoard's full screen editor, ANSIED in RBBS and others.  They may
  870.   be changed to suit your own needs (all keys do not work with all editors --
  871.   capture the editor help info on the BBS).  See Appendix D in COMMO.DOC for
  872.   details on character representation.
  873.   Note that the left arrow function (^S) is also the XOFF character. This may
  874.   cause a problem on some systems.  If pressing the left arrow seems to hang
  875.   the remote, press Ctrl-Q and change the "lfa" macro to:
  876.          {send ^[[D} {}  or  {send ^@K} {}
  877.   PgUp and PgDn are normally used for uploading and downloading.  To use them
  878.   for editing, change the key-labels in the menus above (press F6 in the
  879.   Internal Editor to see them).
  880.  
  881.   Macro                   Key             Function
  882.   ────────────────────────────────────────────────────────────────────────────
  883.   {:hom} {send ^W} {}     Home            Start of line
  884.   {:end} {send ^P} {}     End             End of line
  885.   {:pgu} {send ^R} {}     PgUp            Page up
  886.   {:pgd} {send ^C} {}     PgDn            Page down
  887.   {:upa} {send ^E} {}     Up Arrow        Cursor up
  888.   {:dna} {send ^X} {}     Down Arrow      Cursor down
  889.   {:lfa} {send ^S} {}     Left Arrow      Cursor left
  890.   {:rta} {send ^D} {}     Right Arrow     Cursor right
  891.   {:cla} {send ^A} {}     ^Left Arrow     Word left
  892.   {:cra} {send ^F} {}     ^Right Arrow    Word right
  893.   {:ins} {send ^V} {}     Insert          Toggle insert mode
  894.   {:del} {send ^G} {}     Delete          Delete character
  895.   {:cnd} {send ^K} {}     ^End            Delete to end of line
  896.